home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / hypercrd / xcmd / xcmdmens.sit / xcmd-menus.sit / Menus For HyperCard™ / card_5525.txt < prev    next >
Text File  |  1989-07-14  |  2KB  |  96 lines
  1. -- card: 5525 from stack: in
  2. -- bmap block id: 6075
  3. -- flags: 0000
  4. -- background id: 3333
  5. -- name: Title Page
  6. ----- HyperTalk script -----
  7. on arrowKey direction
  8.   if direction is not "left" then pass arrowKey
  9. end arrowkey
  10.  
  11. on domenu what
  12.   if what is not in "First Last Next Prev" then pass doMenu
  13. end doMenu
  14.  
  15.  
  16.  
  17. -- part 1 (button)
  18. -- low flags: 00
  19. -- high flags: 8002
  20. -- rect: left=170 top=114 right=135 bottom=371
  21. -- title width / last selected line: 0
  22. -- icon id / first selected line: 0 / 0
  23. -- text alignment: 1
  24. -- font id: 0
  25. -- text size: 12
  26. -- style flags: 0
  27. -- line height: 16
  28. -- part name: About Menu Commands
  29. ----- HyperTalk script -----
  30. on mouseUp
  31.   visual effect dissolve
  32.   go to card "Index Card"
  33. end mouseUp
  34.  
  35.  
  36.  
  37. -- part 2 (button)
  38. -- low flags: 00
  39. -- high flags: 0000
  40. -- rect: left=18 top=275 right=296 bottom=164
  41. -- title width / last selected line: 0
  42. -- icon id / first selected line: 0 / 0
  43. -- text alignment: 1
  44. -- font id: 0
  45. -- text size: 12
  46. -- style flags: 0
  47. -- line height: 16
  48. -- part name: 
  49. ----- HyperTalk script -----
  50. on mouseUp
  51.   visual effect zoom out
  52.   go to card "about"
  53. end mouseUp
  54.  
  55.  
  56.  
  57.  
  58. -- part 4 (button)
  59. -- low flags: 00
  60. -- high flags: 0000
  61. -- rect: left=417 top=25 right=48 bottom=489
  62. -- title width / last selected line: 0
  63. -- icon id / first selected line: 0 / 0
  64. -- text alignment: 1
  65. -- font id: 0
  66. -- text size: 12
  67. -- style flags: 0
  68. -- line height: 16
  69. -- part name: 
  70. ----- HyperTalk script -----
  71. on mouseUp
  72.   visual effect zoom out
  73.   go to card "hint"
  74. end mouseUp
  75.  
  76.  
  77.  
  78. -- part 6 (button)
  79. -- low flags: 00
  80. -- high flags: A002
  81. -- rect: left=9 top=311 right=331 bottom=56
  82. -- title width / last selected line: 0
  83. -- icon id / first selected line: 0 / 0
  84. -- text alignment: 1
  85. -- font id: 0
  86. -- text size: 12
  87. -- style flags: 0
  88. -- line height: 16
  89. -- part name: Bye!
  90. ----- HyperTalk script -----
  91. on mouseUp
  92.   visual effect iris close
  93.   go home
  94. end mouseUp
  95.  
  96.